object FBDemo04: TFBDemo04 Left = 320 Top = 175 Width = 576 Height = 464 ActiveControl = Panel1 Caption = 'FBDemo04' Font.Color = clWindowText Font.Height = -14 Font.Name = 'MS Sans Serif' Font.Style = [] Position = poScreenCenter OnCreate = FormCreate PixelsPerInch = 120 TextHeight = 16 object Panel1: TPanel Left = 0 Top = 0 Width = 1000 Height = 50 Align = alTop TabOrder = 0 object DBNavigator: TDBNavigator Left = 10 Top = 10 Width = 280 Height = 31 DataSource = DataSource1 Ctl3D = False ParentCtl3D = False TabOrder = 0 end end object CBReport1: TCBReport Left = 8 Top = 56 Width = 992 Height = 1403 Font.Color = clWindowText Font.Height = 16 Font.Name = 'Arial' Font.Style = [] Color = 15794175 ParentFont = False Frame.Color = clSilver Frame.Left = frSingleThin Frame.Right = frSingleThin Frame.Top = frSingleThin Frame.Bottom = frSingleThin About = 'Version 5.34' AboutRegistered = 'LUKE GREWS' Bands.Detail = Detail Bands.Title = Title Bands.PageFooter = PageFooter Viewer.BkColor = 11234567 Viewer.Heading = 'BandIt Viewer' Viewer.ShowCancelDialog = True Viewer.MinimizeRunForm = False Viewer.ZoomPercentage = 100.000000000000000000 Page.FrameStyle = frThin Page.MarginLeft = 0.400000000000000000 Page.MarginTop = 0.400000000000000000 Page.MarginRight = 0.400000000000000000 Page.PaperSize = A4 OutputTo = poViewer Orientation = Default Units = poInches Copies = 1 LineSpacing = 2.500000000000000000 RewindBeforePrint = True object Panel3: TPanel Left = 49 Top = 1299 Width = 894 Height = 55 Align = alBottom Caption = 'Panel3' Color = clBlue TabOrder = 0 object Label6: TLabel Left = 16 Top = 8 Width = 113 Height = 19 AutoSize = False Caption = 'Ship Date' Font.Color = clWhite Font.Height = -15 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object Label7: TLabel Left = 16 Top = 32 Width = 113 Height = 19 AutoSize = False Caption = 'Order Number' Font.Color = clWhite Font.Height = -15 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object Label8: TLabel Left = 152 Top = 32 Width = 169 Height = 19 AutoSize = False Caption = 'Customer Number' Font.Color = clWhite Font.Height = -15 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object Label9: TLabel Left = 344 Top = 32 Width = 113 Height = 19 AutoSize = False Caption = 'Purchase Order' Font.Color = clWhite Font.Height = -15 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object Label11: TLabel Left = 496 Top = 32 Width = 57 Height = 19 AutoSize = False Caption = 'Terms' Font.Color = clWhite Font.Height = -15 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object Label12: TLabel Left = 584 Top = 32 Width = 113 Height = 19 AutoSize = False Caption = 'Pay Method' Font.Color = clWhite Font.Height = -15 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object Label13: TLabel Left = 686 Top = 32 Width = 91 Height = 19 Alignment = taRightJustify AutoSize = False Caption = 'Items Total' Font.Color = clWhite Font.Height = -15 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object Label10: TLabel Left = 782 Top = 32 Width = 99 Height = 19 Alignment = taRightJustify AutoSize = False Caption = 'Amount Paid' Font.Color = clWhite Font.Height = -15 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end end object Detail: TCBDetailBand Left = 49 Top = 241 Width = 894 Height = 56 Color = clWhite Frame.Color = clSilver Frame.Left = frNone Frame.Right = frNone Frame.Top = frNone Frame.Bottom = frNone Align = alTop BandType = cbDetail DetailMainHeaderBand = DetailMainHeader DetailTotalBand = DetailTotal DataSource = DataSource1 object DBText1: TDBText Left = 8 Top = 27 Width = 65 Height = 17 DataField = 'OrderNo' DataSource = DataSource1 Font.Color = clBlack Font.Height = -17 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object EditShipDate: TDBEdit Left = 10 Top = 2 Width = 127 Height = 23 BorderStyle = bsNone DataField = 'ShipDate' DataSource = DataSource1 Font.Color = clBlack Font.Height = -17 Font.Name = 'Arial' Font.Style = [fsBold] MaxLength = 0 ParentFont = False TabOrder = 0 end object EditCustNo: TDBEdit Left = 154 Top = 8 Width = 143 Height = 32 BorderStyle = bsNone DataField = 'CustNo' DataSource = DataSource1 Font.Color = clBlue Font.Height = -20 Font.Name = 'Arial' Font.Style = [fsBold] MaxLength = 0 ParentFont = False TabOrder = 1 end object EditPO: TDBEdit Left = 338 Top = 22 Width = 126 Height = 24 BorderStyle = bsNone DataField = 'PO' DataSource = DataSource1 Font.Color = clBlack Font.Height = -17 Font.Name = 'Arial' Font.Style = [fsBold] MaxLength = 15 ParentFont = False TabOrder = 2 end object EditTerms: TDBEdit Left = 466 Top = 22 Width = 63 Height = 24 BorderStyle = bsNone DataField = 'Terms' DataSource = DataSource1 Font.Color = clBlack Font.Height = -17 Font.Name = 'Arial' Font.Style = [fsBold] MaxLength = 6 ParentFont = False TabOrder = 3 end object EditPaymentMethod: TDBEdit Left = 554 Top = 22 Width = 70 Height = 24 BorderStyle = bsNone DataField = 'PaymentMethod' DataSource = DataSource1 Font.Color = clBlack Font.Height = -17 Font.Name = 'Arial' Font.Style = [fsBold] MaxLength = 7 ParentFont = False TabOrder = 4 end object EditItemsTotal: TDBEdit Left = 650 Top = 22 Width = 91 Height = 24 BorderStyle = bsNone DataField = 'ItemsTotal' DataSource = DataSource1 Font.Color = clBlack Font.Height = -17 Font.Name = 'Arial' Font.Style = [fsBold] MaxLength = 0 ParentFont = False TabOrder = 5 end object EditAmountPaid: TDBEdit Left = 794 Top = 22 Width = 91 Height = 24 BorderStyle = bsNone DataField = 'AmountPaid' DataSource = DataSource1 Font.Color = clBlack Font.Height = -17 Font.Name = 'Arial' Font.Style = [fsBold] MaxLength = 0 ParentFont = False TabOrder = 6 end end object DetailTotal: TCBBand Left = 49 Top = 297 Width = 894 Height = 32 Color = clWhite Frame.Color = clSilver Frame.Left = frSingleThin Frame.Right = frSingleThin Frame.Top = frSingleThin Frame.Bottom = frSingleThin Align = alTop BandType = cbDetailTotal object Label30: TLabel Left = 456 Top = 2 Width = 169 Height = 25 Alignment = taCenter AutoSize = False Caption = 'Order Total ' Font.Color = clRed Font.Height = -23 Font.Name = 'Times New Roman' Font.Style = [fsBold, fsItalic] ParentFont = False end object CBCalc1: TCBCalc Left = 611 Top = 4 Width = 129 Height = 23 DataField = 'ItemsTotal' DataSource = DataSource1 ParentFont = False BorderStyle = bsNone Color = clWhite Font.Color = clRed Font.Height = -17 Font.Name = 'Arial' Font.Style = [fsBold] DisplayFormat = '$ #,##0.00' Text = '$ 0.00' Alignment = taRightJustify Operation = cbSum CalcPosition = cbFooter end object CBCalc2: TCBCalc Left = 779 Top = 4 Width = 106 Height = 25 DataField = 'AmountPaid' DataSource = DataSource1 ParentFont = False BorderStyle = bsNone Color = clWhite Font.Color = clRed Font.Height = -17 Font.Name = 'Arial' Font.Style = [fsBold] DisplayFormat = '$ #,##0.00' Text = '$ 0.00' Alignment = taRightJustify Operation = cbSum CalcPosition = cbFooter end end object Title: TCBBand Left = 49 Top = 49 Width = 894 Height = 144 Color = clWhite Frame.Color = clSilver Frame.Left = frSingleThin Frame.Right = frSingleThin Frame.Top = frSingleThin Frame.Bottom = frSingleThin Align = alTop BandType = cbTitle object Label5: TLabel Left = 295 Top = 72 Width = 305 Height = 46 Alignment = taCenter AutoSize = False Caption = 'from Calitz Bros.' Font.Color = clMaroon Font.Height = -40 Font.Name = 'Times New Roman' Font.Style = [fsBold, fsItalic] ParentFont = False end object Image1: TImage Left = 8 Top = 19 Width = 49 Height = 33 Picture.Data = {} end object Label27: TLabel Left = 219 Top = 24 Width = 457 Height = 46 Alignment = taCenter AutoSize = False Caption = 'Demo printed with BandIt' Font.Color = clMaroon Font.Height = -40 Font.Name = 'Times New Roman' Font.Style = [fsBold, fsItalic] ParentFont = False end object CBSystem2: TCBSystem Left = 48 Top = 107 Width = 193 Height = 28 ParentFont = False BorderStyle = bsNone Font.Color = clWindowText Font.Height = -17 Font.Name = 'Arial' Font.Style = [] Color = clWhite Data = cbDateTime DisplayFormat = '#,##0.00' Text = '0.00' Alignment = taLeftJustify end end object DetailMainHeader: TCBBand Left = 49 Top = 193 Width = 894 Height = 48 Color = clBlue Frame.Color = clSilver Frame.Left = frSingleThin Frame.Right = frSingleThin Frame.Top = frSingleThin Frame.Bottom = frSingleThin Align = alTop BandType = cbDetailMainHeader object Label14: TLabel Left = 16 Top = 2 Width = 105 Height = 19 Caption = 'Ship Date' Font.Color = clWhite Font.Height = -17 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object Label19: TLabel Left = 16 Top = 24 Width = 81 Height = 19 Caption = 'Order #' Font.Color = clWhite Font.Height = -17 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object Label20: TLabel Left = 154 Top = 21 Width = 164 Height = 19 Caption = 'Customer Number ' Font.Color = clWhite Font.Height = -17 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object Label22: TLabel Left = 466 Top = 21 Width = 59 Height = 19 Caption = 'Terms ' Font.Color = clWhite Font.Height = -17 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object Label23: TLabel Left = 322 Top = 21 Width = 125 Height = 19 Caption = 'Purchase Order' Font.Color = clWhite Font.Height = -17 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object Label24: TLabel Left = 554 Top = 21 Width = 58 Height = 19 Caption = 'Method' Font.Color = clWhite Font.Height = -17 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object Label25: TLabel Left = 658 Top = 21 Width = 95 Height = 19 Alignment = taRightJustify AutoSize = False Caption = 'Items Total' Font.Color = clWhite Font.Height = -17 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object Label26: TLabel Left = 776 Top = 21 Width = 105 Height = 19 Alignment = taRightJustify AutoSize = False Caption = 'Amount Paid' Font.Color = clWhite Font.Height = -17 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object Label31: TLabel Left = 554 Top = 5 Width = 73 Height = 19 Caption = 'Payment ' Font.Color = clWhite Font.Height = -17 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end end object PageFooter: TCBBand Left = 49 Top = 329 Width = 894 Height = 59 Color = clWhite Frame.Color = clSilver Frame.Left = frSingleThin Frame.Right = frSingleThin Frame.Top = frSingleThin Frame.Bottom = frSingleThin Align = alTop BandType = cbPageFooter object Image2: TImage Left = 8 Top = 12 Width = 49 Height = 33 Picture.Data = {} end object Label29: TLabel Left = 219 Top = 3 Width = 457 Height = 49 Alignment = taCenter AutoSize = False Caption = 'Page Footer' Font.Color = clMaroon Font.Height = -40 Font.Name = 'Times New Roman' Font.Style = [fsBold, fsItalic] ParentFont = False end object Label28: TLabel Left = 755 Top = 13 Width = 59 Height = 26 Caption = 'Page ' Font.Color = clBlack Font.Height = -23 Font.Name = 'Arial' Font.Style = [] ParentFont = False end object CBSystem1: TCBSystem Left = 824 Top = 12 Width = 60 Height = 31 ParentFont = False BorderStyle = bsNone Font.Color = clBlack Font.Height = -23 Font.Name = 'Arial' Font.Style = [] Color = clWhite Data = cbPageNumber DisplayFormat = '0' Text = '1' Alignment = taRightJustify end end end object DataSource1: TDataSource DataSet = Table1 Left = 287 Top = 5 end object Table1: TTable Active = True DatabaseName = 'DBDEMOS' TableName = 'ORDERS.DB' Left = 259 Top = 5 object Table1OrderNo: TFloatField FieldName = 'OrderNo' DisplayFormat = #39'#'#39'0000' end object Table1CustNo: TFloatField Alignment = taLeftJustify FieldName = 'CustNo' DisplayFormat = 'CN 0000' MaxValue = 9999.000000000000000000 MinValue = 1000.000000000000000000 end object Table1SaleDate: TDateTimeField FieldName = 'SaleDate' end object Table1ShipDate: TDateTimeField FieldName = 'ShipDate' end object Table1EmpNo: TIntegerField FieldName = 'EmpNo' DisplayFormat = 'Emp'#39'#'#39' 0000' MaxValue = 9999 MinValue = 1 end object Table1ShipToContact: TStringField FieldName = 'ShipToContact' end object Table1ShipToAddr1: TStringField FieldName = 'ShipToAddr1' Size = 30 end object Table1ShipToAddr2: TStringField FieldName = 'ShipToAddr2' Size = 30 end object Table1ShipToCity: TStringField FieldName = 'ShipToCity' Size = 15 end object Table1ShipToState: TStringField FieldName = 'ShipToState' end object Table1ShipToZip: TStringField FieldName = 'ShipToZip' Size = 10 end object Table1ShipToCountry: TStringField FieldName = 'ShipToCountry' end object Table1ShipToPhone: TStringField FieldName = 'ShipToPhone' Size = 15 end object Table1ShipVIA: TStringField FieldName = 'ShipVIA' Size = 7 end object Table1PO: TStringField FieldName = 'PO' Size = 15 end object Table1Terms: TStringField FieldName = 'Terms' Size = 6 end object Table1PaymentMethod: TStringField FieldName = 'PaymentMethod' Size = 7 end object Table1ItemsTotal: TCurrencyField FieldName = 'ItemsTotal' end object Table1TaxRate: TFloatField FieldName = 'TaxRate' DisplayFormat = '0.00%' end object Table1Freight: TCurrencyField FieldName = 'Freight' end object Table1AmountPaid: TCurrencyField FieldName = 'AmountPaid' end end end